home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / Cubed.dxr / 00006_game Movie.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  52.0 KB  |  1,989 lines
  1. global gLine1, gLine2, gLine3, gLine4, gLine5, gLine6, gLine7, gLineFlip1, gLineFlip2, gLineFlip3, gLineFlip4, gLineFlip5, gLineFlip6, gLineFlip7, gHikerX, gHikerY, gEnemyX1, gEnemyY1, gEnemyX2, gEnemyY2, gEnemyX3, gEnemyY3, gEnemyX4, gEnemyY4, gCounta, gCounta2, gBlockFace, gGoThru, gMoveBady, gMoveBady2, gMoveBady3, gMoveBady4, gLevel, gJumpSpeed, gUp, gCompletePercent, gFlipCount, gTemp, gLevelTime, gTotalTime, gPaused, gScore, gTempScore, gCounta3, gCounta4, gCounta5, gCounta6, gCounta7, gPlayerUpRight, gPlayerUpLeft, gPlayerDownRight, gPlayerDownLeft, gEnemy1UpRight, gEnemy1UpLeft, gEnemy1DownRight, gEnemy1DownLeft, gEnemy2UpRight, gEnemy2UpLeft, gEnemy2DownRight, gEnemy2DownLeft, gEnemy3UpRight, gEnemy3UpLeft, gEnemy3DownRight, gEnemy3DownLeft, gEnemy4UpRight, gEnemy4UpLeft, gEnemy4DownRight, gEnemy4DownLeft, gBlocksFlipped, gkount, gMinute, gCue, gReverse1, gCatchTime, gTimeAhead, gEDelay, pAnimBounce, pAnimBounce2, pAnimBounce3, pAnimBounce4, pAnimBounce5, pJump
  2.  
  3. on startMovie
  4.   set the floatPrecision to 2
  5.   gEDelay = 100
  6.   gTimeAhead = 0
  7.   gReverse1 = 0
  8.   gCounta = 1
  9.   gCounta2 = 1
  10.   gCounta3 = 1
  11.   gCounta4 = 1
  12.   gCounta5 = 1
  13.   gCounta6 = 1
  14.   gCounta7 = 1
  15.   gEnemy1UpRight = 0
  16.   gEnemy1UpLeft = 0
  17.   gEnemy1DownRight = 0
  18.   gEnemy1DownLeft = 0
  19.   gEnemy2UpRight = 0
  20.   gEnemy2UpLeft = 0
  21.   gEnemy2DownRight = 0
  22.   gEnemy2DownLeft = 0
  23.   gEnemy3UpRight = 0
  24.   gEnemy3UpLeft = 0
  25.   gEnemy3DownRight = 0
  26.   gEnemy3DownLeft = 0
  27.   gEnemy4UpRight = 0
  28.   gEnemy4UpLeft = 0
  29.   gEnemy4DownRight = 0
  30.   gEnemy4DownLeft = 0
  31.   gCue = 0
  32.   gMinute = 0
  33.   gBlocksFlipped = 0
  34.   member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  35.   member("TimeText").text = string(gLevelTime / 60 / 60) & ":" & "0" & string(gLevelTime / 60)
  36.   gPlayerUpRight = 0
  37.   gPlayerUpLeft = 0
  38.   gPlayerDownRight = 0
  39.   gPlayerDownLeft = 0
  40.   repeat with gCounta3 = 49 to 63
  41.     member(gCounta3).regPoint = point(20, 78)
  42.   end repeat
  43.   repeat with gCounta3 = 73 to 87
  44.     member(gCounta3).regPoint = point(20, 78)
  45.   end repeat
  46.   repeat with gCounta3 = 89 to 103
  47.     member(gCounta3).regPoint = point(20, 78)
  48.   end repeat
  49.   gCounta3 = 1
  50.   gCounta4 = 1
  51.   gScore = 0
  52.   member("ScoreText").text = string(gScore)
  53.   gLevel = 1
  54.   member("LevelText").text = string(gLevel)
  55.   gBlocksFlipped = 0
  56.   member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  57.   gPaused = 0
  58.   gLevelTime = 0
  59.   gTotalTime = 0
  60.   sprite(6).visible = 0
  61.   gLine1 = [2]
  62.   gLine2 = [0, 0]
  63.   gLine3 = [0, 0, 0]
  64.   gLine4 = [0, 0, 0, 0]
  65.   gLine5 = [0, 0, 0, 0, 0]
  66.   gLine6 = [0, 0, 0, 0, 0, 0]
  67.   gLine7 = [0, 0, 0, 1, 0, 0, 0]
  68.   gLineFlip1 = [0]
  69.   gLineFlip2 = [0, 0]
  70.   gLineFlip3 = [0, 0, 0]
  71.   gLineFlip4 = [0, 0, 0, 0]
  72.   gLineFlip5 = [0, 0, 0, 0, 0]
  73.   gLineFlip6 = [0, 0, 0, 0, 0, 0]
  74.   gLineFlip7 = [0, 0, 0, 0, 0, 0, 0]
  75.   gHikerY = 7
  76.   gHikerX = 4
  77.   gEnemyX1 = 1
  78.   gEnemyY1 = 1
  79.   gEnemyX2 = 0
  80.   gEnemyY2 = 0
  81.   gEnemyX3 = 0
  82.   gEnemyY3 = 0
  83.   gEnemyX4 = 0
  84.   gEnemyY4 = 0
  85.   sprite(200).loc = point(284, 406)
  86.   sprite(205).loc = point(284, 118)
  87.   sprite(205).visible = 1
  88.   sprite(206).loc = point(284, 118)
  89.   sprite(206).visible = 0
  90.   sprite(207).visible = 0
  91.   sprite(208).visible = 0
  92.   gJumpSpeed = 2
  93.   gCounta2 = 0
  94.   gMoveBady = 0
  95.   gMoveBady2 = 0
  96.   gMoveBady3 = 0
  97.   gMoveBady4 = 0
  98.   gUp = 1
  99.   gCompletePercent = 0.0
  100.   gFlipCount = 0.0
  101.   sprite(210).visible = 0
  102.   repeat with gCounta = 0 to 6
  103.     repeat while gHikerY > gCounta2
  104.       sprite(70 + gCounta2 + (gCounta * 7)).locH = 62 + (gCounta2 * 74) + (gCounta * 37)
  105.       sprite(70 + gCounta2 + (gCounta * 7)).locV = 406 - (gCounta * 48)
  106.       moveStarField()
  107.       startTimer()
  108.       repeat while the timer < 1
  109.         updateStage()
  110.       end repeat
  111.       gCounta2 = gCounta2 + 1
  112.     end repeat
  113.     gHikerY = gHikerY - 1
  114.     gCounta2 = 0
  115.   end repeat
  116.   gHikerY = 7
  117.   gHikerX = 4
  118.   startTimer()
  119. end
  120.  
  121. on ShowTime
  122.   if the timer > gTimeAhead then
  123.     if (the timer / 60 / 60) >= (gMinute + 1) then
  124.       gMinute = gMinute + 1
  125.     end if
  126.     gTimeAhead = the timer + 60
  127.     if gMinute = 0 then
  128.       if the timer < 600 then
  129.         member("TimeText").text = string(gMinute) & ":" & "0" & string(the timer / 60 mod 60)
  130.       else
  131.         member("TimeText").text = string(gMinute) & ":" & string(the timer / 60 mod 60)
  132.       end if
  133.     else
  134.       if gMinute = 1 then
  135.         if (the timer >= 3600) and (the timer < 4200) then
  136.           member("TimeText").text = string(gMinute) & ":" & "0" & string(the timer / 60 mod 60)
  137.         else
  138.           member("TimeText").text = string(gMinute) & ":" & string(the timer / 60 mod 60)
  139.         end if
  140.       else
  141.         if gMinute = 2 then
  142.           if (the timer >= 7200) and (the timer < 7800) then
  143.             member("TimeText").text = string(gMinute) & ":" & "0" & string(the timer / 60 mod 60)
  144.           else
  145.             member("TimeText").text = string(gMinute) & ":" & string(the timer / 60 mod 60)
  146.           end if
  147.         else
  148.           if gMinute = 3 then
  149.             if (the timer >= 10800) and (the timer < 11400) then
  150.               member("TimeText").text = string(gMinute) & ":" & "0" & string(the timer / 60 mod 60)
  151.             else
  152.               member("TimeText").text = string(gMinute) & ":" & string(the timer / 60 mod 60)
  153.             end if
  154.           else
  155.             if gMinute = 4 then
  156.               if (the timer >= 14400) and (the timer < 15000) then
  157.                 member("TimeText").text = string(gMinute) & ":" & "0" & string(the timer / 60 mod 60)
  158.               else
  159.                 member("TimeText").text = string(gMinute) & ":" & string(the timer / 60 mod 60)
  160.               end if
  161.             else
  162.               member("GameoverText").text = "Give it another Try!"
  163.               puppetSound(5, "lose10")
  164.               go(20)
  165.             end if
  166.           end if
  167.         end if
  168.       end if
  169.     end if
  170.   end if
  171. end
  172.  
  173. on AnimatePlayer
  174.   if gCounta3 > 15 then
  175.     gCounta3 = 1
  176.   end if
  177.   if gCounta3 <= 9 then
  178.     sprite(200).member = "Balltest_Animated" & "0" & gCounta3
  179.   else
  180.     sprite(200).member = "Balltest_Animated" & gCounta3
  181.   end if
  182.   gCounta3 = gCounta3 + 1
  183. end
  184.  
  185. on AnimateEnemy1
  186.   if gCounta4 > 15 then
  187.     gCounta4 = 1
  188.   end if
  189.   if gCounta4 <= 9 then
  190.     sprite(205).member = "Balltest2_Animated" & "0" & gCounta4
  191.   else
  192.     sprite(205).member = "Balltest2_Animated" & gCounta4
  193.   end if
  194.   gCounta4 = gCounta4 + 1
  195. end
  196.  
  197. on AnimateEnemy2
  198.   if gCounta5 > 15 then
  199.     gCounta5 = 1
  200.   end if
  201.   if gCounta5 <= 9 then
  202.     sprite(206).member = "Balltest2_Animated" & "0" & gCounta5
  203.   else
  204.     sprite(206).member = "Balltest2_Animated" & gCounta5
  205.   end if
  206.   gCounta5 = gCounta5 + 1
  207. end
  208.  
  209. on AnimateEnemy3
  210.   if gCounta6 > 15 then
  211.     gCounta6 = 1
  212.   end if
  213.   if gCounta6 <= 9 then
  214.     sprite(207).member = "Balltest2_Animated" & "0" & gCounta6
  215.   else
  216.     sprite(207).member = "Balltest2_Animated" & gCounta6
  217.   end if
  218.   gCounta6 = gCounta6 + 1
  219. end
  220.  
  221. on AnimateEnemy4
  222.   if gCounta7 > 15 then
  223.     gCounta7 = 1
  224.   end if
  225.   if gCounta7 <= 9 then
  226.     sprite(208).member = "Balltest3_Animated" & "0" & gCounta7
  227.   else
  228.     sprite(208).member = "Balltest3_Animated" & gCounta7
  229.   end if
  230.   gCounta7 = gCounta7 + 1
  231. end
  232.  
  233. on EnemyCollision
  234.   if (gHikerY = gEnemyY1) and (gHikerX = gEnemyX1) then
  235.     gPaused = 1
  236.     gLevelTime = the timer
  237.     gTotalTime = gTotalTime + the timer
  238.     sprite(200).width = 100
  239.     sprite(200).height = 75
  240.     repeat with gCounta3 = 1 to 15
  241.       if gCounta3 <= 9 then
  242.         sprite(200).member = "BallBombtest" & "0" & gCounta3
  243.       else
  244.         sprite(200).member = "BallBombtest" & gCounta3
  245.       end if
  246.       startTimer()
  247.       repeat while the timer < 4
  248.         updateStage()
  249.         moveStarField()
  250.       end repeat
  251.       sprite(200).width = sprite(200).width + 4
  252.       sprite(200).height = sprite(200).height + 4
  253.       sprite(200).blend = sprite(200).blend - 6
  254.       updateStage()
  255.       moveStarField()
  256.     end repeat
  257.     member("GameoverText").text = "Give it another Try!"
  258.     puppetSound(5, "lose10")
  259.     go(20)
  260.   end if
  261. end
  262.  
  263. on Enemy2Collision
  264.   if (gHikerY = gEnemyY2) and (gHikerX = gEnemyX2) then
  265.     gPaused = 1
  266.     gLevelTime = the timer
  267.     gTotalTime = gTotalTime + the timer
  268.     sprite(200).width = 100
  269.     sprite(200).height = 75
  270.     repeat with gCounta3 = 1 to 15
  271.       if gCounta3 <= 9 then
  272.         sprite(200).member = "BallBombtest" & "0" & gCounta3
  273.       else
  274.         sprite(200).member = "BallBombtest" & gCounta3
  275.       end if
  276.       startTimer()
  277.       repeat while the timer < 4
  278.         updateStage()
  279.         moveStarField()
  280.       end repeat
  281.       sprite(200).width = sprite(200).width + 4
  282.       sprite(200).height = sprite(200).height + 4
  283.       sprite(200).blend = sprite(200).blend - 6
  284.       updateStage()
  285.       moveStarField()
  286.     end repeat
  287.     member("GameoverText").text = "Give it another Try!"
  288.     puppetSound(5, "lose10")
  289.     go(20)
  290.   end if
  291. end
  292.  
  293. on Enemy3Collision
  294.   if (gHikerY = gEnemyY3) and (gHikerX = gEnemyX3) then
  295.     gPaused = 1
  296.     gLevelTime = the timer
  297.     gTotalTime = gTotalTime + the timer
  298.     startTimer()
  299.     repeat while the timer < 80
  300.       updateStage()
  301.       moveStarField()
  302.     end repeat
  303.     puppetSound(5, "lose10")
  304.     go(20)
  305.   end if
  306. end
  307.  
  308. on Enemy4Collision
  309.   if (gHikerY = gEnemyY4) and (gHikerX = gEnemyX4) then
  310.     sprite(210).loc = sprite(200).loc
  311.     sprite(210).visible = 1
  312.     gPaused = 1
  313.     gLevelTime = the timer
  314.     gTotalTime = gTotalTime + the timer
  315.     startTimer()
  316.     repeat while the timer < 80
  317.       updateStage()
  318.       moveStarField()
  319.     end repeat
  320.     member("GameoverText").text = "Give it another Try!"
  321.     puppetSound(5, "lose10")
  322.     go(20)
  323.   end if
  324. end
  325.  
  326. on checkLevelComplete
  327.   gFlipCount = 0.0
  328.   repeat with gTemp = 1 to 7
  329.     if gTemp = 1 then
  330.       if gLineFlip1[1] = 9 then
  331.         gFlipCount = gFlipCount + 1
  332.       end if
  333.       if gLineFlip2[1] = 9 then
  334.         gFlipCount = gFlipCount + 1
  335.       end if
  336.       if gLineFlip3[1] = 9 then
  337.         gFlipCount = gFlipCount + 1
  338.       end if
  339.       if gLineFlip4[1] = 9 then
  340.         gFlipCount = gFlipCount + 1
  341.       end if
  342.       if gLineFlip5[1] = 9 then
  343.         gFlipCount = gFlipCount + 1
  344.       end if
  345.       if gLineFlip6[1] = 9 then
  346.         gFlipCount = gFlipCount + 1
  347.       end if
  348.       if gLineFlip7[1] = 9 then
  349.         gFlipCount = gFlipCount + 1
  350.       end if
  351.       next repeat
  352.     end if
  353.     if gTemp = 2 then
  354.       if gLineFlip2[2] = 9 then
  355.         gFlipCount = gFlipCount + 1
  356.       end if
  357.       if gLineFlip3[2] = 9 then
  358.         gFlipCount = gFlipCount + 1
  359.       end if
  360.       if gLineFlip4[2] = 9 then
  361.         gFlipCount = gFlipCount + 1
  362.       end if
  363.       if gLineFlip5[2] = 9 then
  364.         gFlipCount = gFlipCount + 1
  365.       end if
  366.       if gLineFlip6[2] = 9 then
  367.         gFlipCount = gFlipCount + 1
  368.       end if
  369.       if gLineFlip7[2] = 9 then
  370.         gFlipCount = gFlipCount + 1
  371.       end if
  372.       next repeat
  373.     end if
  374.     if gTemp = 3 then
  375.       if gLineFlip3[3] = 9 then
  376.         gFlipCount = gFlipCount + 1
  377.       end if
  378.       if gLineFlip4[3] = 9 then
  379.         gFlipCount = gFlipCount + 1
  380.       end if
  381.       if gLineFlip5[3] = 9 then
  382.         gFlipCount = gFlipCount + 1
  383.       end if
  384.       if gLineFlip6[3] = 9 then
  385.         gFlipCount = gFlipCount + 1
  386.       end if
  387.       if gLineFlip7[3] = 9 then
  388.         gFlipCount = gFlipCount + 1
  389.       end if
  390.       next repeat
  391.     end if
  392.     if gTemp = 4 then
  393.       if gLineFlip4[4] = 9 then
  394.         gFlipCount = gFlipCount + 1
  395.       end if
  396.       if gLineFlip5[4] = 9 then
  397.         gFlipCount = gFlipCount + 1
  398.       end if
  399.       if gLineFlip6[4] = 9 then
  400.         gFlipCount = gFlipCount + 1
  401.       end if
  402.       if gLineFlip7[4] = 9 then
  403.         gFlipCount = gFlipCount + 1
  404.       end if
  405.       next repeat
  406.     end if
  407.     if gTemp = 5 then
  408.       if gLineFlip5[5] = 9 then
  409.         gFlipCount = gFlipCount + 1
  410.       end if
  411.       if gLineFlip6[5] = 9 then
  412.         gFlipCount = gFlipCount + 1
  413.       end if
  414.       if gLineFlip7[5] = 9 then
  415.         gFlipCount = gFlipCount + 1
  416.       end if
  417.       next repeat
  418.     end if
  419.     if gTemp = 6 then
  420.       if gLineFlip6[6] = 9 then
  421.         gFlipCount = gFlipCount + 1
  422.       end if
  423.       if gLineFlip7[6] = 9 then
  424.         gFlipCount = gFlipCount + 1
  425.       end if
  426.       next repeat
  427.     end if
  428.     if gTemp = 7 then
  429.       if gLineFlip7[7] = 9 then
  430.         gFlipCount = gFlipCount + 1
  431.       end if
  432.     end if
  433.   end repeat
  434.   if gLevel = 1 then
  435.     gCompletePercent = 16
  436.   else
  437.     if gLevel = 2 then
  438.       gCompletePercent = 18
  439.     else
  440.       if gLevel = 3 then
  441.         gCompletePercent = 21
  442.       else
  443.         if gLevel = 4 then
  444.           gCompletePercent = 23
  445.         else
  446.           if gLevel = 5 then
  447.             gCompletePercent = 25
  448.           end if
  449.         end if
  450.       end if
  451.     end if
  452.   end if
  453.   if gFlipCount >= gCompletePercent then
  454.     member("BlocksText").text = gCompletePercent && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  455.     gLevelTime = the timer
  456.     gTotalTime = gTotalTime + the timer
  457.     gPaused = 1
  458.     gEnemyX1 = 0
  459.     gEnemyY1 = 0
  460.     gEnemyX2 = 0
  461.     gEnemyY2 = 0
  462.     if (gLevel = 1) or (gLevel = 3) then
  463.       sprite(205).width = 100
  464.       sprite(205).height = 75
  465.       repeat with gCounta3 = 1 to 15
  466.         if gCounta3 <= 9 then
  467.           sprite(205).member = "BallBombtest" & "0" & gCounta3
  468.         else
  469.           sprite(205).member = "BallBombtest" & gCounta3
  470.         end if
  471.         startTimer()
  472.         repeat while the timer < 4
  473.           moveStarField()
  474.           updateStage()
  475.         end repeat
  476.         sprite(205).width = sprite(205).width + 4
  477.         sprite(205).height = sprite(205).height + 4
  478.         sprite(205).blend = sprite(205).blend - 6
  479.         moveStarField()
  480.         updateStage()
  481.       end repeat
  482.     else
  483.       if (gLevel = 2) or (gLevel = 4) or (gLevel = 5) then
  484.         sprite(206).width = 100
  485.         sprite(206).height = 75
  486.         repeat with gCounta3 = 1 to 15
  487.           if gCounta3 <= 9 then
  488.             sprite(206).member = "BallBombtest" & "0" & gCounta3
  489.           else
  490.             sprite(206).member = "BallBombtest" & gCounta3
  491.           end if
  492.           startTimer()
  493.           repeat while the timer < 4
  494.             moveStarField()
  495.             updateStage()
  496.           end repeat
  497.           sprite(206).width = sprite(206).width + 3
  498.           sprite(206).height = sprite(206).height + 3
  499.           sprite(206).blend = sprite(206).blend - 6
  500.           moveStarField()
  501.           updateStage()
  502.         end repeat
  503.       end if
  504.     end if
  505.     if gLevel < 5 then
  506.       member("GameoverText").text = "Give it another Try!"
  507.       go(10)
  508.     else
  509.       member("GameoverText").text = "You Win!!!"
  510.       puppetSound(5, "win10")
  511.       go(20)
  512.     end if
  513.   end if
  514. end
  515.  
  516. on MoveHikerUpRight
  517.   if gHikerY = 7 then
  518.     gLine7[gHikerX] = 0
  519.     gLine6[gHikerX] = 1
  520.   else
  521.     if gHikerY = 6 then
  522.       gLine6[gHikerX] = 0
  523.       gLine5[gHikerX] = 1
  524.     else
  525.       if gHikerY = 5 then
  526.         gLine5[gHikerX] = 0
  527.         gLine4[gHikerX] = 1
  528.       else
  529.         if gHikerY = 4 then
  530.           gLine4[gHikerX] = 0
  531.           gLine3[gHikerX] = 1
  532.         else
  533.           if gHikerY = 3 then
  534.             gLine3[gHikerX] = 0
  535.             gLine2[gHikerX] = 1
  536.           else
  537.             if gHikerY = 2 then
  538.               gLine2[gHikerX] = 0
  539.               gLine1[1] = 1
  540.             end if
  541.           end if
  542.         end if
  543.       end if
  544.     end if
  545.   end if
  546.   gHikerY = gHikerY - 1
  547. end
  548.  
  549. on MoveHikerUpLeft
  550.   if gHikerY = 7 then
  551.     gLine7[gHikerX] = 0
  552.     gHikerX = gHikerX - 1
  553.     gLine6[gHikerX] = 1
  554.   else
  555.     if gHikerY = 6 then
  556.       gLine6[gHikerX] = 0
  557.       gHikerX = gHikerX - 1
  558.       gLine5[gHikerX] = 1
  559.     else
  560.       if gHikerY = 5 then
  561.         gLine5[gHikerX] = 0
  562.         gHikerX = gHikerX - 1
  563.         gLine4[gHikerX] = 1
  564.       else
  565.         if gHikerY = 4 then
  566.           gLine4[gHikerX] = 0
  567.           gHikerX = gHikerX - 1
  568.           gLine3[gHikerX] = 1
  569.         else
  570.           if gHikerY = 3 then
  571.             gLine3[gHikerX] = 0
  572.             gHikerX = gHikerX - 1
  573.             gLine2[gHikerX] = 1
  574.           else
  575.             if gHikerY = 2 then
  576.               gLine2[gHikerX] = 0
  577.               gHikerX = gHikerX - 1
  578.               gLine1[1] = 1
  579.             end if
  580.           end if
  581.         end if
  582.       end if
  583.     end if
  584.   end if
  585.   gHikerY = gHikerY - 1
  586. end
  587.  
  588. on MoveHikerDownLeft
  589.   if gHikerY = 6 then
  590.     gLine6[gHikerX] = 0
  591.     gLine7[gHikerX] = 1
  592.   else
  593.     if gHikerY = 5 then
  594.       gLine5[gHikerX] = 0
  595.       gLine6[gHikerX] = 1
  596.     else
  597.       if gHikerY = 4 then
  598.         gLine4[gHikerX] = 0
  599.         gLine5[gHikerX] = 1
  600.       else
  601.         if gHikerY = 3 then
  602.           gLine3[gHikerX] = 0
  603.           gLine4[gHikerX] = 1
  604.         else
  605.           if gHikerY = 2 then
  606.             gLine2[gHikerX] = 0
  607.             gLine3[gHikerX] = 1
  608.           else
  609.             if gHikerY = 1 then
  610.               gLine1[gHikerX] = 0
  611.               gLine2[gHikerX] = 1
  612.             end if
  613.           end if
  614.         end if
  615.       end if
  616.     end if
  617.   end if
  618.   gHikerY = gHikerY + 1
  619. end
  620.  
  621. on MoveHikerDownRight
  622.   if gHikerY = 6 then
  623.     gLine6[gHikerX] = 0
  624.     gHikerX = gHikerX + 1
  625.     gLine7[gHikerX] = 1
  626.   else
  627.     if gHikerY = 5 then
  628.       gLine5[gHikerX] = 0
  629.       gHikerX = gHikerX + 1
  630.       gLine6[gHikerX] = 1
  631.     else
  632.       if gHikerY = 4 then
  633.         gLine4[gHikerX] = 0
  634.         gHikerX = gHikerX + 1
  635.         gLine5[gHikerX] = 1
  636.       else
  637.         if gHikerY = 3 then
  638.           gLine3[gHikerX] = 0
  639.           gHikerX = gHikerX + 1
  640.           gLine4[gHikerX] = 1
  641.         else
  642.           if gHikerY = 2 then
  643.             gLine2[gHikerX] = 0
  644.             gHikerX = gHikerX + 1
  645.             gLine3[gHikerX] = 1
  646.           else
  647.             if gHikerY = 1 then
  648.               gLine1[gHikerX] = 0
  649.               gHikerX = gHikerX + 1
  650.               gLine2[gHikerX] = 1
  651.             end if
  652.           end if
  653.         end if
  654.       end if
  655.     end if
  656.   end if
  657.   gHikerY = gHikerY + 1
  658. end
  659.  
  660. on flipBlock
  661.   repeat with gGoThru = 70 to 112
  662.     if sprite(200).loc = sprite(gGoThru).loc then
  663.       if sprite(gGoThru).member.name = "block06" then
  664.         sprite(gGoThru).member = "block06_flipped"
  665.         gBlocksFlipped = gBlocksFlipped + 1
  666.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  667.         if gHikerY = 7 then
  668.           gLineFlip7[gHikerX] = 9
  669.         else
  670.           if gHikerY = 6 then
  671.             gLineFlip6[gHikerX] = 9
  672.           else
  673.             if gHikerY = 5 then
  674.               gLineFlip5[gHikerX] = 9
  675.             else
  676.               if gHikerY = 4 then
  677.                 gLineFlip4[gHikerX] = 9
  678.               else
  679.                 if gHikerY = 3 then
  680.                   gLineFlip3[gHikerX] = 9
  681.                 else
  682.                   if gHikerY = 2 then
  683.                     gLineFlip2[gHikerX] = 9
  684.                   else
  685.                     if gHikerY = 1 then
  686.                       gLineFlip1[gHikerX] = 9
  687.                     end if
  688.                   end if
  689.                 end if
  690.               end if
  691.             end if
  692.           end if
  693.         end if
  694.         puppetSound(1, "player red")
  695.         next repeat
  696.       end if
  697.       if sprite(gGoThru).member.name = "block06_flipped" then
  698.         sprite(gGoThru).member = "block06"
  699.         gBlocksFlipped = gBlocksFlipped - 1
  700.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  701.         if gHikerY = 7 then
  702.           gLineFlip7[gHikerX] = 0
  703.         else
  704.           if gHikerY = 6 then
  705.             gLineFlip6[gHikerX] = 0
  706.           else
  707.             if gHikerY = 5 then
  708.               gLineFlip5[gHikerX] = 0
  709.             else
  710.               if gHikerY = 4 then
  711.                 gLineFlip4[gHikerX] = 0
  712.               else
  713.                 if gHikerY = 3 then
  714.                   gLineFlip3[gHikerX] = 0
  715.                 else
  716.                   if gHikerY = 2 then
  717.                     gLineFlip2[gHikerX] = 0
  718.                   else
  719.                     if gHikerY = 1 then
  720.                       gLineFlip1[gHikerX] = 0
  721.                     end if
  722.                   end if
  723.                 end if
  724.               end if
  725.             end if
  726.           end if
  727.         end if
  728.         puppetSound(1, "player blue")
  729.       end if
  730.     end if
  731.   end repeat
  732. end
  733.  
  734. on enemy1FlipBlock
  735.   repeat with gGoThru = 70 to 112
  736.     if sprite(205).loc = sprite(gGoThru).loc then
  737.       if sprite(gGoThru).member.name = "block06" then
  738.         sprite(gGoThru).member = "block06_flipped"
  739.         gBlocksFlipped = gBlocksFlipped + 1
  740.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  741.         if gEnemyY1 = 7 then
  742.           gLineFlip7[gEnemyX1] = 9
  743.         else
  744.           if gEnemyY1 = 6 then
  745.             gLineFlip6[gEnemyX1] = 9
  746.           else
  747.             if gEnemyY1 = 5 then
  748.               gLineFlip5[gEnemyX1] = 9
  749.             else
  750.               if gEnemyY1 = 4 then
  751.                 gLineFlip4[gEnemyX1] = 9
  752.               else
  753.                 if gEnemyY1 = 3 then
  754.                   gLineFlip3[gEnemyX1] = 9
  755.                 else
  756.                   if gEnemyY1 = 2 then
  757.                     gLineFlip2[gEnemyX1] = 9
  758.                   else
  759.                     if gEnemyY1 = 1 then
  760.                       gLineFlip1[gEnemyX1] = 9
  761.                     end if
  762.                   end if
  763.                 end if
  764.               end if
  765.             end if
  766.           end if
  767.         end if
  768.         puppetSound(2, "enemy red")
  769.         next repeat
  770.       end if
  771.       if sprite(gGoThru).member.name = "block06_flipped" then
  772.         sprite(gGoThru).member = "block06"
  773.         gBlocksFlipped = gBlocksFlipped - 1
  774.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  775.         if gEnemyY1 = 7 then
  776.           gLineFlip7[gEnemyX1] = 0
  777.         else
  778.           if gEnemyY1 = 6 then
  779.             gLineFlip6[gEnemyX1] = 0
  780.           else
  781.             if gEnemyY1 = 5 then
  782.               gLineFlip5[gEnemyX1] = 0
  783.             else
  784.               if gEnemyY1 = 4 then
  785.                 gLineFlip4[gEnemyX1] = 0
  786.               else
  787.                 if gEnemyY1 = 3 then
  788.                   gLineFlip3[gEnemyX1] = 0
  789.                 else
  790.                   if gEnemyY1 = 2 then
  791.                     gLineFlip2[gEnemyX1] = 0
  792.                   else
  793.                     if gEnemyY1 = 1 then
  794.                       gLineFlip1[gEnemyX1] = 0
  795.                     end if
  796.                   end if
  797.                 end if
  798.               end if
  799.             end if
  800.           end if
  801.         end if
  802.         puppetSound(2, "enemy blue")
  803.       end if
  804.     end if
  805.   end repeat
  806. end
  807.  
  808. on enemy2FlipBlock
  809.   repeat with gGoThru = 70 to 112
  810.     if sprite(206).loc = sprite(gGoThru).loc then
  811.       if sprite(gGoThru).member.name = "block06" then
  812.         sprite(gGoThru).member = "block06_flipped"
  813.         gBlocksFlipped = gBlocksFlipped + 1
  814.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  815.         if gEnemyY2 = 7 then
  816.           gLineFlip7[gEnemyX2] = 9
  817.         else
  818.           if gEnemyY2 = 6 then
  819.             gLineFlip6[gEnemyX2] = 9
  820.           else
  821.             if gEnemyY2 = 5 then
  822.               gLineFlip5[gEnemyX2] = 9
  823.             else
  824.               if gEnemyY2 = 4 then
  825.                 gLineFlip4[gEnemyX2] = 9
  826.               else
  827.                 if gEnemyY2 = 3 then
  828.                   gLineFlip3[gEnemyX2] = 9
  829.                 else
  830.                   if gEnemyY2 = 2 then
  831.                     gLineFlip2[gEnemyX2] = 9
  832.                   else
  833.                     if gEnemyY2 = 1 then
  834.                       gLineFlip1[gEnemyX2] = 9
  835.                     end if
  836.                   end if
  837.                 end if
  838.               end if
  839.             end if
  840.           end if
  841.         end if
  842.         puppetSound(2, "enemy red")
  843.         next repeat
  844.       end if
  845.       if sprite(gGoThru).member.name = "block06_flipped" then
  846.         sprite(gGoThru).member = "block06"
  847.         gBlocksFlipped = gBlocksFlipped - 1
  848.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  849.         if gEnemyY2 = 7 then
  850.           gLineFlip7[gEnemyX2] = 0
  851.         else
  852.           if gEnemyY2 = 6 then
  853.             gLineFlip6[gEnemyX2] = 0
  854.           else
  855.             if gEnemyY2 = 5 then
  856.               gLineFlip5[gEnemyX2] = 0
  857.             else
  858.               if gEnemyY2 = 4 then
  859.                 gLineFlip4[gEnemyX2] = 0
  860.               else
  861.                 if gEnemyY2 = 3 then
  862.                   gLineFlip3[gEnemyX2] = 0
  863.                 else
  864.                   if gEnemyY2 = 2 then
  865.                     gLineFlip2[gEnemyX2] = 0
  866.                   else
  867.                     if gEnemyY2 = 1 then
  868.                       gLineFlip1[gEnemyX2] = 0
  869.                     end if
  870.                   end if
  871.                 end if
  872.               end if
  873.             end if
  874.           end if
  875.         end if
  876.         puppetSound(2, "enemy blue")
  877.       end if
  878.     end if
  879.   end repeat
  880. end
  881.  
  882. on enemy3FlipBlock
  883.   repeat with gGoThru = 70 to 112
  884.     if sprite(207).loc = sprite(gGoThru).loc then
  885.       if sprite(gGoThru).member.name = "block06" then
  886.         sprite(gGoThru).member = "block06_flipped"
  887.         gBlocksFlipped = gBlocksFlipped + 1
  888.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  889.         if gEnemyY3 = 7 then
  890.           gLineFlip7[gEnemyX3] = 9
  891.         else
  892.           if gEnemyY3 = 6 then
  893.             gLineFlip6[gEnemyX3] = 9
  894.           else
  895.             if gEnemyY3 = 5 then
  896.               gLineFlip5[gEnemyX3] = 9
  897.             else
  898.               if gEnemyY3 = 4 then
  899.                 gLineFlip4[gEnemyX3] = 9
  900.               else
  901.                 if gEnemyY3 = 3 then
  902.                   gLineFlip3[gEnemyX3] = 9
  903.                 else
  904.                   if gEnemyY3 = 2 then
  905.                     gLineFlip2[gEnemyX3] = 9
  906.                   else
  907.                     if gEnemyY3 = 1 then
  908.                       gLineFlip1[gEnemyX3] = 9
  909.                     end if
  910.                   end if
  911.                 end if
  912.               end if
  913.             end if
  914.           end if
  915.         end if
  916.         puppetSound(2, "enemy red")
  917.         next repeat
  918.       end if
  919.       if sprite(gGoThru).member.name = "block06_flipped" then
  920.         sprite(gGoThru).member = "block06"
  921.         gBlocksFlipped = gBlocksFlipped - 1
  922.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  923.         if gEnemyY3 = 7 then
  924.           gLineFlip7[gEnemyX3] = 0
  925.         else
  926.           if gEnemyY3 = 6 then
  927.             gLineFlip6[gEnemyX3] = 0
  928.           else
  929.             if gEnemyY3 = 5 then
  930.               gLineFlip5[gEnemyX3] = 0
  931.             else
  932.               if gEnemyY3 = 4 then
  933.                 gLineFlip4[gEnemyX3] = 0
  934.               else
  935.                 if gEnemyY3 = 3 then
  936.                   gLineFlip3[gEnemyX3] = 0
  937.                 else
  938.                   if gEnemyY3 = 2 then
  939.                     gLineFlip2[gEnemyX3] = 0
  940.                   else
  941.                     if gEnemyY3 = 1 then
  942.                       gLineFlip1[gEnemyX3] = 0
  943.                     end if
  944.                   end if
  945.                 end if
  946.               end if
  947.             end if
  948.           end if
  949.         end if
  950.         puppetSound(2, "enemy blue")
  951.       end if
  952.     end if
  953.   end repeat
  954. end
  955.  
  956. on enemy4FlipBlock
  957.   repeat with gGoThru = 70 to 112
  958.     if sprite(208).loc = sprite(gGoThru).loc then
  959.       if sprite(gGoThru).member.name = "block06" then
  960.         sprite(gGoThru).member = "block06_flipped"
  961.         gBlocksFlipped = gBlocksFlipped + 1
  962.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  963.         if gEnemyY4 = 7 then
  964.           gLineFlip7[gEnemyX4] = 9
  965.         else
  966.           if gEnemyY4 = 6 then
  967.             gLineFlip6[gEnemyX4] = 9
  968.           else
  969.             if gEnemyY4 = 5 then
  970.               gLineFlip5[gEnemyX4] = 9
  971.             else
  972.               if gEnemyY4 = 4 then
  973.                 gLineFlip4[gEnemyX4] = 9
  974.               else
  975.                 if gEnemyY4 = 3 then
  976.                   gLineFlip3[gEnemyX4] = 9
  977.                 else
  978.                   if gEnemyY4 = 2 then
  979.                     gLineFlip2[gEnemyX4] = 9
  980.                   else
  981.                     if gEnemyY4 = 1 then
  982.                       gLineFlip1[gEnemyX4] = 9
  983.                     end if
  984.                   end if
  985.                 end if
  986.               end if
  987.             end if
  988.           end if
  989.         end if
  990.         puppetSound(2, "enemy red")
  991.         next repeat
  992.       end if
  993.       if sprite(gGoThru).member.name = "block06_flipped" then
  994.         sprite(gGoThru).member = "block06"
  995.         gBlocksFlipped = gBlocksFlipped - 1
  996.         member("BlocksText").text = gBlocksFlipped && "of" && integer((0.5 + (gLevel * 0.08)) * 28)
  997.         if gEnemyY4 = 7 then
  998.           gLineFlip7[gEnemyX4] = 0
  999.         else
  1000.           if gEnemyY4 = 6 then
  1001.             gLineFlip6[gEnemyX4] = 0
  1002.           else
  1003.             if gEnemyY4 = 5 then
  1004.               gLineFlip5[gEnemyX4] = 0
  1005.             else
  1006.               if gEnemyY4 = 4 then
  1007.                 gLineFlip4[gEnemyX4] = 0
  1008.               else
  1009.                 if gEnemyY4 = 3 then
  1010.                   gLineFlip3[gEnemyX4] = 0
  1011.                 else
  1012.                   if gEnemyY4 = 2 then
  1013.                     gLineFlip2[gEnemyX4] = 0
  1014.                   else
  1015.                     if gEnemyY4 = 1 then
  1016.                       gLineFlip1[gEnemyX4] = 0
  1017.                     end if
  1018.                   end if
  1019.                 end if
  1020.               end if
  1021.             end if
  1022.           end if
  1023.         end if
  1024.         puppetSound(2, "enemy blue")
  1025.       end if
  1026.     end if
  1027.   end repeat
  1028. end
  1029.  
  1030. on MoveEnemyUpRight
  1031.   if gEnemyY1 = 7 then
  1032.     if gLine6[gEnemyX1] <= 1 then
  1033.       gLine7[gEnemyX1] = 0
  1034.       gLine6[gEnemyX1] = 2
  1035.       gEnemyY1 = gEnemyY1 - 1
  1036.       return 1
  1037.     end if
  1038.   else
  1039.     if gEnemyY1 = 6 then
  1040.       if gLine5[gEnemyX1] <= 1 then
  1041.         gLine6[gEnemyX1] = 0
  1042.         gLine5[gEnemyX1] = 2
  1043.         gEnemyY1 = gEnemyY1 - 1
  1044.         return 1
  1045.       end if
  1046.     else
  1047.       if gEnemyY1 = 5 then
  1048.         if gLine4[gEnemyX1] <= 1 then
  1049.           gLine5[gEnemyX1] = 0
  1050.           gLine4[gEnemyX1] = 2
  1051.           gEnemyY1 = gEnemyY1 - 1
  1052.           return 1
  1053.         end if
  1054.       else
  1055.         if gEnemyY1 = 4 then
  1056.           if gLine3[gEnemyX1] <= 1 then
  1057.             gLine4[gEnemyX1] = 0
  1058.             gLine3[gEnemyX1] = 2
  1059.             gEnemyY1 = gEnemyY1 - 1
  1060.             return 1
  1061.           end if
  1062.         else
  1063.           if gEnemyY1 = 3 then
  1064.             if gLine2[gEnemyX1] <= 1 then
  1065.               gLine3[gEnemyX1] = 0
  1066.               gLine2[gEnemyX1] = 2
  1067.               gEnemyY1 = gEnemyY1 - 1
  1068.               return 1
  1069.             end if
  1070.           else
  1071.             if gEnemyY1 = 2 then
  1072.               if gLine1[1] <= 1 then
  1073.                 gLine2[gEnemyX1] = 0
  1074.                 gLine1[1] = 2
  1075.                 gEnemyY1 = gEnemyY1 - 1
  1076.                 return 1
  1077.               end if
  1078.             end if
  1079.           end if
  1080.         end if
  1081.       end if
  1082.     end if
  1083.   end if
  1084.   return 0
  1085. end
  1086.  
  1087. on MoveEnemyUpLeft
  1088.   if gEnemyY1 = 7 then
  1089.     if gLine6[gEnemyX1 - 1] <= 1 then
  1090.       gLine7[gHikerX] = 0
  1091.       gEnemyX1 = gEnemyX1 - 1
  1092.       gLine6[gEnemyX1] = 2
  1093.       gEnemyY1 = gEnemyY1 - 1
  1094.       return 1
  1095.     end if
  1096.   else
  1097.     if gEnemyY1 = 6 then
  1098.       if gLine5[gEnemyX1 - 1] <= 1 then
  1099.         gLine6[gEnemyX1] = 0
  1100.         gEnemyX1 = gEnemyX1 - 1
  1101.         gLine5[gEnemyX1] = 2
  1102.         gEnemyY1 = gEnemyY1 - 1
  1103.         return 1
  1104.       end if
  1105.     else
  1106.       if gEnemyY1 = 5 then
  1107.         if gLine4[gEnemyX1 - 1] <= 1 then
  1108.           gLine5[gEnemyX1] = 0
  1109.           gEnemyX1 = gEnemyX1 - 1
  1110.           gLine4[gEnemyX1] = 2
  1111.           gEnemyY1 = gEnemyY1 - 1
  1112.           return 1
  1113.         end if
  1114.       else
  1115.         if gEnemyY1 = 4 then
  1116.           if gLine3[gEnemyX1 - 1] <= 1 then
  1117.             gLine4[gEnemyX1] = 0
  1118.             gEnemyX1 = gEnemyX1 - 1
  1119.             gLine3[gEnemyX1] = 2
  1120.             gEnemyY1 = gEnemyY1 - 1
  1121.             return 1
  1122.           end if
  1123.         else
  1124.           if gEnemyY1 = 3 then
  1125.             if gLine2[gEnemyX1 - 1] <= 1 then
  1126.               gLine3[gEnemyX1] = 0
  1127.               gEnemyX1 = gEnemyX1 - 1
  1128.               gLine2[gEnemyX1] = 2
  1129.               gEnemyY1 = gEnemyY1 - 1
  1130.               return 1
  1131.             end if
  1132.           else
  1133.             if gEnemyY1 = 2 then
  1134.               if gLine1[gEnemyX1 - 1] <= 1 then
  1135.                 gLine2[gEnemyX1] = 0
  1136.                 gEnemyX1 = gEnemyX1 - 1
  1137.                 gLine1[1] = 2
  1138.                 gEnemyY1 = gEnemyY1 - 1
  1139.                 return 1
  1140.               end if
  1141.             end if
  1142.           end if
  1143.         end if
  1144.       end if
  1145.     end if
  1146.   end if
  1147.   return 0
  1148. end
  1149.  
  1150. on MoveEnemyDownLeft
  1151.   if gEnemyY1 = 6 then
  1152.     if gLine7[gEnemyX1] <= 1 then
  1153.       gLine6[gEnemyX1] = 0
  1154.       gLine7[gEnemyX1] = 2
  1155.       gEnemyY1 = gEnemyY1 + 1
  1156.       return 1
  1157.     end if
  1158.   else
  1159.     if gEnemyY1 = 5 then
  1160.       if gLine6[gEnemyX1] <= 1 then
  1161.         gLine5[gEnemyX1] = 0
  1162.         gLine6[gEnemyX1] = 2
  1163.         gEnemyY1 = gEnemyY1 + 1
  1164.         return 1
  1165.       end if
  1166.     else
  1167.       if gEnemyY1 = 4 then
  1168.         if gLine5[gEnemyX1] <= 1 then
  1169.           gLine4[gEnemyX1] = 0
  1170.           gLine5[gEnemyX1] = 2
  1171.           gEnemyY1 = gEnemyY1 + 1
  1172.           return 1
  1173.         end if
  1174.       else
  1175.         if gEnemyY1 = 3 then
  1176.           if gLine4[gEnemyX1] <= 1 then
  1177.             gLine3[gEnemyX1] = 0
  1178.             gLine4[gEnemyX1] = 2
  1179.             gEnemyY1 = gEnemyY1 + 1
  1180.             return 1
  1181.           end if
  1182.         else
  1183.           if gEnemyY1 = 2 then
  1184.             if gLine3[gEnemyX1] <= 1 then
  1185.               gLine2[gEnemyX1] = 0
  1186.               gLine3[gEnemyX1] = 2
  1187.               gEnemyY1 = gEnemyY1 + 1
  1188.               return 1
  1189.             end if
  1190.           else
  1191.             if gEnemyY1 = 1 then
  1192.               if gLine3[gEnemyX1] <= 1 then
  1193.                 gLine1[gEnemyX1] = 0
  1194.                 gLine2[gEnemyX1] = 2
  1195.                 gEnemyY1 = gEnemyY1 + 1
  1196.                 return 1
  1197.               end if
  1198.             end if
  1199.           end if
  1200.         end if
  1201.       end if
  1202.     end if
  1203.   end if
  1204.   return 0
  1205. end
  1206.  
  1207. on MoveEnemyDownRight
  1208.   if gEnemyY1 = 6 then
  1209.     if gLine7[gEnemyX1 + 1] <= 1 then
  1210.       gLine6[gEnemyX1] = 0
  1211.       gEnemyX1 = gEnemyX1 + 1
  1212.       gLine7[gEnemyX1] = 2
  1213.       gEnemyY1 = gEnemyY1 + 1
  1214.       return 1
  1215.     end if
  1216.   else
  1217.     if gEnemyY1 = 5 then
  1218.       if gLine6[gEnemyX1 + 1] <= 1 then
  1219.         gLine5[gEnemyX1] = 0
  1220.         gEnemyX1 = gEnemyX1 + 1
  1221.         gLine6[gEnemyX1] = 2
  1222.         gEnemyY1 = gEnemyY1 + 1
  1223.         return 1
  1224.       end if
  1225.     else
  1226.       if gEnemyY1 = 4 then
  1227.         if gLine5[gEnemyX1 + 1] <= 1 then
  1228.           gLine4[gEnemyX1] = 0
  1229.           gEnemyX1 = gEnemyX1 + 1
  1230.           gLine5[gEnemyX1] = 2
  1231.           gEnemyY1 = gEnemyY1 + 1
  1232.           return 1
  1233.         end if
  1234.       else
  1235.         if gEnemyY1 = 3 then
  1236.           if gLine4[gEnemyX1 + 1] <= 1 then
  1237.             gLine3[gEnemyX1] = 0
  1238.             gEnemyX1 = gEnemyX1 + 1
  1239.             gLine4[gEnemyX1] = 2
  1240.             gEnemyY1 = gEnemyY1 + 1
  1241.             return 1
  1242.           end if
  1243.         else
  1244.           if gEnemyY1 = 2 then
  1245.             if gLine3[gEnemyX1 + 1] <= 1 then
  1246.               gLine2[gEnemyX1] = 0
  1247.               gEnemyX1 = gEnemyX1 + 1
  1248.               gLine3[gEnemyX1] = 2
  1249.               gEnemyY1 = gEnemyY1 + 1
  1250.               return 1
  1251.             end if
  1252.           else
  1253.             if gEnemyY1 = 1 then
  1254.               if gLine2[gEnemyX1 + 1] <= 1 then
  1255.                 gLine1[gEnemyX1] = 0
  1256.                 gEnemyX1 = gEnemyX1 + 1
  1257.                 gLine2[gEnemyX1] = 2
  1258.                 gEnemyY1 = gEnemyY1 + 1
  1259.                 return 1
  1260.               end if
  1261.             end if
  1262.           end if
  1263.         end if
  1264.       end if
  1265.     end if
  1266.   end if
  1267.   return 0
  1268. end
  1269.  
  1270. on MoveEnemy2UpRight
  1271.   if gEnemyY2 = 7 then
  1272.     if gLine6[gEnemyX2] <= 1 then
  1273.       gLine7[gEnemyX2] = 0
  1274.       gLine6[gEnemyX2] = 2
  1275.       gEnemyY2 = gEnemyY2 - 1
  1276.       return 1
  1277.     end if
  1278.   else
  1279.     if gEnemyY2 = 6 then
  1280.       if gLine5[gEnemyX2] <= 1 then
  1281.         gLine6[gEnemyX2] = 0
  1282.         gLine5[gEnemyX2] = 2
  1283.         gEnemyY2 = gEnemyY2 - 1
  1284.         return 1
  1285.       end if
  1286.     else
  1287.       if gEnemyY2 = 5 then
  1288.         if gLine4[gEnemyX2] <= 1 then
  1289.           gLine5[gEnemyX2] = 0
  1290.           gLine4[gEnemyX2] = 2
  1291.           gEnemyY2 = gEnemyY2 - 1
  1292.           return 1
  1293.         end if
  1294.       else
  1295.         if gEnemyY2 = 4 then
  1296.           if gLine3[gEnemyX2] <= 1 then
  1297.             gLine4[gEnemyX2] = 0
  1298.             gLine3[gEnemyX2] = 2
  1299.             gEnemyY2 = gEnemyY2 - 1
  1300.             return 1
  1301.           end if
  1302.         else
  1303.           if gEnemyY2 = 3 then
  1304.             if gLine2[gEnemyX2] <= 1 then
  1305.               gLine3[gEnemyX2] = 0
  1306.               gLine2[gEnemyX2] = 2
  1307.               gEnemyY2 = gEnemyY2 - 1
  1308.               return 1
  1309.             end if
  1310.           else
  1311.             if gEnemyY2 = 2 then
  1312.               if gLine1[1] <= 1 then
  1313.                 gLine2[gEnemyX2] = 0
  1314.                 gLine1[1] = 2
  1315.                 gEnemyY2 = gEnemyY2 - 1
  1316.                 return 1
  1317.               end if
  1318.             end if
  1319.           end if
  1320.         end if
  1321.       end if
  1322.     end if
  1323.   end if
  1324.   return 0
  1325. end
  1326.  
  1327. on MoveEnemy2UpLeft
  1328.   if gEnemyY2 = 7 then
  1329.     if gLine6[gEnemyX2 - 1] <= 1 then
  1330.       gLine7[gHikerX] = 0
  1331.       gEnemyX2 = gEnemyX2 - 1
  1332.       gLine6[gEnemyX2] = 2
  1333.       gEnemyY2 = gEnemyY2 - 1
  1334.       return 1
  1335.     end if
  1336.   else
  1337.     if gEnemyY2 = 6 then
  1338.       if gLine5[gEnemyX2 - 1] <= 1 then
  1339.         gLine6[gEnemyX2] = 0
  1340.         gEnemyX2 = gEnemyX2 - 1
  1341.         gLine5[gEnemyX2] = 2
  1342.         gEnemyY2 = gEnemyY2 - 1
  1343.         return 1
  1344.       end if
  1345.     else
  1346.       if gEnemyY2 = 5 then
  1347.         if gLine4[gEnemyX2 - 1] <= 1 then
  1348.           gLine5[gEnemyX2] = 0
  1349.           gEnemyX2 = gEnemyX2 - 1
  1350.           gLine4[gEnemyX2] = 2
  1351.           gEnemyY2 = gEnemyY2 - 1
  1352.           return 1
  1353.         end if
  1354.       else
  1355.         if gEnemyY2 = 4 then
  1356.           if gLine3[gEnemyX2 - 1] <= 1 then
  1357.             gLine4[gEnemyX2] = 0
  1358.             gEnemyX2 = gEnemyX2 - 1
  1359.             gLine3[gEnemyX2] = 2
  1360.             gEnemyY2 = gEnemyY2 - 1
  1361.             return 1
  1362.           end if
  1363.         else
  1364.           if gEnemyY2 = 3 then
  1365.             if gLine2[gEnemyX2 - 1] <= 1 then
  1366.               gLine3[gEnemyX2] = 0
  1367.               gEnemyX2 = gEnemyX2 - 1
  1368.               gLine2[gEnemyX2] = 2
  1369.               gEnemyY2 = gEnemyY2 - 1
  1370.               return 1
  1371.             end if
  1372.           else
  1373.             if gEnemyY2 = 2 then
  1374.               if gLine1[gEnemyX2 - 1] <= 1 then
  1375.                 gLine2[gEnemyX2] = 0
  1376.                 gEnemyX2 = gEnemyX2 - 1
  1377.                 gLine1[1] = 2
  1378.                 gEnemyY2 = gEnemyY2 - 1
  1379.                 return 1
  1380.               end if
  1381.             end if
  1382.           end if
  1383.         end if
  1384.       end if
  1385.     end if
  1386.   end if
  1387.   return 0
  1388. end
  1389.  
  1390. on MoveEnemy2DownLeft
  1391.   if gEnemyY2 = 6 then
  1392.     if gLine7[gEnemyX2] <= 1 then
  1393.       gLine6[gEnemyX2] = 0
  1394.       gLine7[gEnemyX2] = 2
  1395.       gEnemyY2 = gEnemyY2 + 1
  1396.       return 1
  1397.     end if
  1398.   else
  1399.     if gEnemyY2 = 5 then
  1400.       if gLine6[gEnemyX2] <= 1 then
  1401.         gLine5[gEnemyX2] = 0
  1402.         gLine6[gEnemyX2] = 2
  1403.         gEnemyY2 = gEnemyY2 + 1
  1404.         return 1
  1405.       end if
  1406.     else
  1407.       if gEnemyY2 = 4 then
  1408.         if gLine5[gEnemyX2] <= 1 then
  1409.           gLine4[gEnemyX2] = 0
  1410.           gLine5[gEnemyX2] = 2
  1411.           gEnemyY2 = gEnemyY2 + 1
  1412.           return 1
  1413.         end if
  1414.       else
  1415.         if gEnemyY2 = 3 then
  1416.           if gLine4[gEnemyX2] <= 1 then
  1417.             gLine3[gEnemyX2] = 0
  1418.             gLine4[gEnemyX2] = 2
  1419.             gEnemyY2 = gEnemyY2 + 1
  1420.             return 1
  1421.           end if
  1422.         else
  1423.           if gEnemyY2 = 2 then
  1424.             if gLine3[gEnemyX2] <= 1 then
  1425.               gLine2[gEnemyX2] = 0
  1426.               gLine3[gEnemyX2] = 2
  1427.               gEnemyY2 = gEnemyY2 + 1
  1428.               return 1
  1429.             end if
  1430.           else
  1431.             if gEnemyY2 = 1 then
  1432.               if gLine3[gEnemyX2] <= 1 then
  1433.                 gLine1[gEnemyX2] = 0
  1434.                 gLine2[gEnemyX2] = 2
  1435.                 gEnemyY2 = gEnemyY2 + 1
  1436.                 return 1
  1437.               end if
  1438.             end if
  1439.           end if
  1440.         end if
  1441.       end if
  1442.     end if
  1443.   end if
  1444.   return 0
  1445. end
  1446.  
  1447. on MoveEnemy2DownRight
  1448.   if gEnemyY2 = 6 then
  1449.     if gLine7[gEnemyX2 + 1] <= 1 then
  1450.       gLine6[gEnemyX2] = 0
  1451.       gEnemyX2 = gEnemyX2 + 1
  1452.       gLine7[gEnemyX2] = 2
  1453.       gEnemyY2 = gEnemyY2 + 1
  1454.       return 1
  1455.     end if
  1456.   else
  1457.     if gEnemyY2 = 5 then
  1458.       if gLine6[gEnemyX2 + 1] <= 1 then
  1459.         gLine5[gEnemyX2] = 0
  1460.         gEnemyX2 = gEnemyX2 + 1
  1461.         gLine6[gEnemyX2] = 2
  1462.         gEnemyY2 = gEnemyY2 + 1
  1463.         return 1
  1464.       end if
  1465.     else
  1466.       if gEnemyY2 = 4 then
  1467.         if gLine5[gEnemyX2 + 1] <= 1 then
  1468.           gLine4[gEnemyX2] = 0
  1469.           gEnemyX2 = gEnemyX2 + 1
  1470.           gLine5[gEnemyX2] = 2
  1471.           gEnemyY2 = gEnemyY2 + 1
  1472.           return 1
  1473.         end if
  1474.       else
  1475.         if gEnemyY2 = 3 then
  1476.           if gLine4[gEnemyX2 + 1] <= 1 then
  1477.             gLine3[gEnemyX2] = 0
  1478.             gEnemyX2 = gEnemyX2 + 1
  1479.             gLine4[gEnemyX2] = 2
  1480.             gEnemyY2 = gEnemyY2 + 1
  1481.             return 1
  1482.           end if
  1483.         else
  1484.           if gEnemyY2 = 2 then
  1485.             if gLine3[gEnemyX2 + 1] <= 1 then
  1486.               gLine2[gEnemyX2] = 0
  1487.               gEnemyX2 = gEnemyX2 + 1
  1488.               gLine3[gEnemyX2] = 2
  1489.               gEnemyY2 = gEnemyY2 + 1
  1490.               return 1
  1491.             end if
  1492.           else
  1493.             if gEnemyY2 = 1 then
  1494.               if gLine2[gEnemyX2 + 1] <= 1 then
  1495.                 gLine1[gEnemyX2] = 0
  1496.                 gEnemyX2 = gEnemyX2 + 1
  1497.                 gLine2[gEnemyX2] = 2
  1498.                 gEnemyY2 = gEnemyY2 + 1
  1499.                 return 1
  1500.               end if
  1501.             end if
  1502.           end if
  1503.         end if
  1504.       end if
  1505.     end if
  1506.   end if
  1507.   return 0
  1508. end
  1509.  
  1510. on MoveEnemy3UpRight
  1511.   if gEnemyY3 = 7 then
  1512.     if gLine6[gEnemyX3] <= 1 then
  1513.       gLine7[gEnemyX3] = 0
  1514.       gLine6[gEnemyX3] = 2
  1515.       gEnemyY3 = gEnemyY3 - 1
  1516.       return 1
  1517.     end if
  1518.   else
  1519.     if gEnemyY3 = 6 then
  1520.       if gLine5[gEnemyX3] <= 1 then
  1521.         gLine6[gEnemyX3] = 0
  1522.         gLine5[gEnemyX3] = 2
  1523.         gEnemyY3 = gEnemyY3 - 1
  1524.         return 1
  1525.       end if
  1526.     else
  1527.       if gEnemyY3 = 5 then
  1528.         if gLine4[gEnemyX3] <= 1 then
  1529.           gLine5[gEnemyX3] = 0
  1530.           gLine4[gEnemyX3] = 2
  1531.           gEnemyY3 = gEnemyY3 - 1
  1532.           return 1
  1533.         end if
  1534.       else
  1535.         if gEnemyY3 = 4 then
  1536.           if gLine3[gEnemyX3] <= 1 then
  1537.             gLine4[gEnemyX3] = 0
  1538.             gLine3[gEnemyX3] = 2
  1539.             gEnemyY3 = gEnemyY3 - 1
  1540.             return 1
  1541.           end if
  1542.         else
  1543.           if gEnemyY3 = 3 then
  1544.             if gLine2[gEnemyX3] <= 1 then
  1545.               gLine3[gEnemyX3] = 0
  1546.               gLine2[gEnemyX3] = 2
  1547.               gEnemyY3 = gEnemyY3 - 1
  1548.               return 1
  1549.             end if
  1550.           else
  1551.             if gEnemyY3 = 2 then
  1552.               if gLine1[1] <= 1 then
  1553.                 gLine2[gEnemyX3] = 0
  1554.                 gLine1[1] = 2
  1555.                 gEnemyY3 = gEnemyY3 - 1
  1556.                 return 1
  1557.               end if
  1558.             end if
  1559.           end if
  1560.         end if
  1561.       end if
  1562.     end if
  1563.   end if
  1564.   return 0
  1565. end
  1566.  
  1567. on MoveEnemy3UpLeft
  1568.   if gEnemyY3 = 7 then
  1569.     if gLine6[gEnemyX3 - 1] <= 1 then
  1570.       gLine7[gHikerX] = 0
  1571.       gEnemyX3 = gEnemyX3 - 1
  1572.       gLine6[gEnemyX3] = 2
  1573.       gEnemyY3 = gEnemyY3 - 1
  1574.       return 1
  1575.     end if
  1576.   else
  1577.     if gEnemyY3 = 6 then
  1578.       if gLine5[gEnemyX3 - 1] <= 1 then
  1579.         gLine6[gEnemyX3] = 0
  1580.         gEnemyX3 = gEnemyX3 - 1
  1581.         gLine5[gEnemyX3] = 2
  1582.         gEnemyY3 = gEnemyY3 - 1
  1583.         return 1
  1584.       end if
  1585.     else
  1586.       if gEnemyY3 = 5 then
  1587.         if gLine4[gEnemyX3 - 1] <= 1 then
  1588.           gLine5[gEnemyX3] = 0
  1589.           gEnemyX3 = gEnemyX3 - 1
  1590.           gLine4[gEnemyX3] = 2
  1591.           gEnemyY3 = gEnemyY3 - 1
  1592.           return 1
  1593.         end if
  1594.       else
  1595.         if gEnemyY3 = 4 then
  1596.           if gLine3[gEnemyX3 - 1] <= 1 then
  1597.             gLine4[gEnemyX3] = 0
  1598.             gEnemyX3 = gEnemyX3 - 1
  1599.             gLine3[gEnemyX3] = 2
  1600.             gEnemyY3 = gEnemyY3 - 1
  1601.             return 1
  1602.           end if
  1603.         else
  1604.           if gEnemyY3 = 3 then
  1605.             if gLine2[gEnemyX3 - 1] <= 1 then
  1606.               gLine3[gEnemyX3] = 0
  1607.               gEnemyX3 = gEnemyX3 - 1
  1608.               gLine2[gEnemyX3] = 2
  1609.               gEnemyY3 = gEnemyY3 - 1
  1610.               return 1
  1611.             end if
  1612.           else
  1613.             if gEnemyY3 = 2 then
  1614.               if gLine1[1] <= 1 then
  1615.                 gLine2[gEnemyX3 - 1] = 0
  1616.                 gEnemyX3 = gEnemyX3 - 1
  1617.                 gLine1[1] = 2
  1618.                 gEnemyY3 = gEnemyY3 - 1
  1619.                 return 1
  1620.               end if
  1621.             end if
  1622.           end if
  1623.         end if
  1624.       end if
  1625.     end if
  1626.   end if
  1627.   return 0
  1628. end
  1629.  
  1630. on MoveEnemy3DownLeft
  1631.   if gEnemyY3 = 6 then
  1632.     if gLine7[gEnemyX3] <= 1 then
  1633.       gLine6[gEnemyX3] = 0
  1634.       gLine7[gEnemyX3] = 2
  1635.       gEnemyY3 = gEnemyY3 + 1
  1636.       return 1
  1637.     end if
  1638.   else
  1639.     if gEnemyY3 = 5 then
  1640.       if gLine6[gEnemyX3] <= 1 then
  1641.         gLine5[gEnemyX3] = 0
  1642.         gLine6[gEnemyX3] = 2
  1643.         gEnemyY3 = gEnemyY3 + 1
  1644.         return 1
  1645.       end if
  1646.     else
  1647.       if gEnemyY3 = 4 then
  1648.         if gLine5[gEnemyX3] <= 1 then
  1649.           gLine4[gEnemyX3] = 0
  1650.           gLine5[gEnemyX3] = 2
  1651.           gEnemyY3 = gEnemyY3 + 1
  1652.           return 1
  1653.         end if
  1654.       else
  1655.         if gEnemyY3 = 3 then
  1656.           if gLine4[gEnemyX3] <= 1 then
  1657.             gLine3[gEnemyX3] = 0
  1658.             gLine4[gEnemyX3] = 2
  1659.             gEnemyY3 = gEnemyY3 + 1
  1660.             return 1
  1661.           end if
  1662.         else
  1663.           if gEnemyY3 = 2 then
  1664.             if gLine3[gEnemyX3] <= 1 then
  1665.               gLine2[gEnemyX3] = 0
  1666.               gLine3[gEnemyX3] = 2
  1667.               gEnemyY3 = gEnemyY3 + 1
  1668.               return 1
  1669.             end if
  1670.           else
  1671.             if gEnemyY3 = 1 then
  1672.               if gLine3[gEnemyX3] <= 1 then
  1673.                 gLine1[gEnemyX3] = 0
  1674.                 gLine2[gEnemyX3] = 2
  1675.                 gEnemyY3 = gEnemyY3 + 1
  1676.                 return 1
  1677.               end if
  1678.             end if
  1679.           end if
  1680.         end if
  1681.       end if
  1682.     end if
  1683.   end if
  1684.   return 0
  1685. end
  1686.  
  1687. on MoveEnemy3DownRight
  1688.   if gEnemyY3 = 6 then
  1689.     if gLine7[gEnemyX3 + 1] <= 1 then
  1690.       gLine6[gEnemyX3] = 0
  1691.       gEnemyX3 = gEnemyX3 + 1
  1692.       gLine7[gEnemyX3] = 2
  1693.       gEnemyY3 = gEnemyY3 + 1
  1694.       return 1
  1695.     end if
  1696.   else
  1697.     if gEnemyY3 = 5 then
  1698.       if gLine6[gEnemyX3 + 1] <= 1 then
  1699.         gLine5[gEnemyX3] = 0
  1700.         gEnemyX3 = gEnemyX3 + 1
  1701.         gLine6[gEnemyX3] = 2
  1702.         gEnemyY3 = gEnemyY3 + 1
  1703.         return 1
  1704.       end if
  1705.     else
  1706.       if gEnemyY3 = 4 then
  1707.         if gLine5[gEnemyX3 + 1] <= 1 then
  1708.           gLine4[gEnemyX3] = 0
  1709.           gEnemyX3 = gEnemyX3 + 1
  1710.           gLine5[gEnemyX3] = 2
  1711.           gEnemyY3 = gEnemyY3 + 1
  1712.           return 1
  1713.         end if
  1714.       else
  1715.         if gEnemyY3 = 3 then
  1716.           if gLine4[gEnemyX3 + 1] <= 1 then
  1717.             gLine3[gEnemyX3] = 0
  1718.             gEnemyX3 = gEnemyX3 + 1
  1719.             gLine4[gEnemyX3] = 2
  1720.             gEnemyY3 = gEnemyY3 + 1
  1721.             return 1
  1722.           end if
  1723.         else
  1724.           if gEnemyY3 = 2 then
  1725.             if gLine3[gEnemyX3 + 1] <= 1 then
  1726.               gLine2[gEnemyX3] = 0
  1727.               gEnemyX3 = gEnemyX3 + 1
  1728.               gLine3[gEnemyX3] = 2
  1729.               gEnemyY3 = gEnemyY3 + 1
  1730.               return 1
  1731.             end if
  1732.           else
  1733.             if gEnemyY3 = 1 then
  1734.               if gLine2[gEnemyX3 + 1] <= 1 then
  1735.                 gLine1[gEnemyX3] = 0
  1736.                 gEnemyX3 = gEnemyX3 + 1
  1737.                 gLine2[gEnemyX3] = 2
  1738.                 gEnemyY3 = gEnemyY3 + 1
  1739.                 return 1
  1740.               end if
  1741.             end if
  1742.           end if
  1743.         end if
  1744.       end if
  1745.     end if
  1746.   end if
  1747.   return 0
  1748. end
  1749.  
  1750. on MoveEnemy4UpRight
  1751.   if gEnemyY4 = 7 then
  1752.     if gLine6[gEnemyX4] <= 1 then
  1753.       gLine7[gEnemyX4] = 0
  1754.       gLine6[gEnemyX4] = 2
  1755.       gEnemyY4 = gEnemyY4 - 1
  1756.       return 1
  1757.     end if
  1758.   else
  1759.     if gEnemyY4 = 6 then
  1760.       if gLine5[gEnemyX4] <= 1 then
  1761.         gLine6[gEnemyX4] = 0
  1762.         gLine5[gEnemyX4] = 2
  1763.         gEnemyY4 = gEnemyY4 - 1
  1764.         return 1
  1765.       end if
  1766.     else
  1767.       if gEnemyY4 = 5 then
  1768.         if gLine4[gEnemyX4] <= 1 then
  1769.           gLine5[gEnemyX4] = 0
  1770.           gLine4[gEnemyX4] = 2
  1771.           gEnemyY4 = gEnemyY4 - 1
  1772.           return 1
  1773.         end if
  1774.       else
  1775.         if gEnemyY4 = 4 then
  1776.           if gLine3[gEnemyX4] <= 1 then
  1777.             gLine4[gEnemyX4] = 0
  1778.             gLine3[gEnemyX4] = 2
  1779.             gEnemyY4 = gEnemyY4 - 1
  1780.             return 1
  1781.           end if
  1782.         else
  1783.           if gEnemyY4 = 3 then
  1784.             if gLine2[gEnemyX4] <= 1 then
  1785.               gLine3[gEnemyX4] = 0
  1786.               gLine2[gEnemyX4] = 2
  1787.               gEnemyY4 = gEnemyY4 - 1
  1788.               return 1
  1789.             end if
  1790.           else
  1791.             if gEnemyY4 = 2 then
  1792.               if gLine1[1] <= 1 then
  1793.                 gLine2[gEnemyX4] = 0
  1794.                 gLine1[1] = 2
  1795.                 gEnemyY4 = gEnemyY4 - 1
  1796.                 return 1
  1797.               end if
  1798.             end if
  1799.           end if
  1800.         end if
  1801.       end if
  1802.     end if
  1803.   end if
  1804.   return 0
  1805. end
  1806.  
  1807. on MoveEnemy4UpLeft
  1808.   if gEnemyY4 = 7 then
  1809.     if gLine6[gEnemyX4 - 1] <= 1 then
  1810.       gLine7[gHikerX] = 0
  1811.       gEnemyX4 = gEnemyX4 - 1
  1812.       gLine6[gEnemyX4] = 2
  1813.       gEnemyY4 = gEnemyY4 - 1
  1814.       return 1
  1815.     end if
  1816.   else
  1817.     if gEnemyY4 = 6 then
  1818.       if gLine5[gEnemyX4 - 1] <= 1 then
  1819.         gLine6[gEnemyX4] = 0
  1820.         gEnemyX4 = gEnemyX4 - 1
  1821.         gLine5[gEnemyX4] = 2
  1822.         gEnemyY4 = gEnemyY4 - 1
  1823.         return 1
  1824.       end if
  1825.     else
  1826.       if gEnemyY4 = 5 then
  1827.         if gLine4[gEnemyX4 - 1] <= 1 then
  1828.           gLine5[gEnemyX4] = 0
  1829.           gEnemyX4 = gEnemyX4 - 1
  1830.           gLine4[gEnemyX4] = 2
  1831.           gEnemyY4 = gEnemyY4 - 1
  1832.           return 1
  1833.         end if
  1834.       else
  1835.         if gEnemyY4 = 4 then
  1836.           if gLine3[gEnemyX4 - 1] <= 1 then
  1837.             gLine4[gEnemyX4] = 0
  1838.             gEnemyX4 = gEnemyX4 - 1
  1839.             gLine3[gEnemyX4] = 2
  1840.             gEnemyY4 = gEnemyY4 - 1
  1841.             return 1
  1842.           end if
  1843.         else
  1844.           if gEnemyY4 = 3 then
  1845.             if gLine2[gEnemyX4 - 1] <= 1 then
  1846.               gLine3[gEnemyX4] = 0
  1847.               gEnemyX4 = gEnemyX4 - 1
  1848.               gLine2[gEnemyX4] = 2
  1849.               gEnemyY4 = gEnemyY4 - 1
  1850.               return 1
  1851.             end if
  1852.           else
  1853.             if gEnemyY4 = 2 then
  1854.               if gLine1[gEnemyX4 - 1] <= 1 then
  1855.                 gLine2[gEnemyX4] = 0
  1856.                 gEnemyX4 = gEnemyX4 - 1
  1857.                 gLine1[1] = 2
  1858.                 gEnemyY4 = gEnemyY4 - 1
  1859.                 return 1
  1860.               end if
  1861.             end if
  1862.           end if
  1863.         end if
  1864.       end if
  1865.     end if
  1866.   end if
  1867.   return 0
  1868. end
  1869.  
  1870. on MoveEnemy4DownLeft
  1871.   if gEnemyY4 = 6 then
  1872.     if gLine7[gEnemyX4] <= 1 then
  1873.       gLine6[gEnemyX4] = 0
  1874.       gLine7[gEnemyX4] = 2
  1875.       gEnemyY4 = gEnemyY4 + 1
  1876.       return 1
  1877.     end if
  1878.   else
  1879.     if gEnemyY4 = 5 then
  1880.       if gLine6[gEnemyX4] <= 1 then
  1881.         gLine5[gEnemyX4] = 0
  1882.         gLine6[gEnemyX4] = 2
  1883.         gEnemyY4 = gEnemyY4 + 1
  1884.         return 1
  1885.       end if
  1886.     else
  1887.       if gEnemyY4 = 4 then
  1888.         if gLine5[gEnemyX4] <= 1 then
  1889.           gLine4[gEnemyX4] = 0
  1890.           gLine5[gEnemyX4] = 2
  1891.           gEnemyY4 = gEnemyY4 + 1
  1892.           return 1
  1893.         end if
  1894.       else
  1895.         if gEnemyY4 = 3 then
  1896.           if gLine4[gEnemyX4] <= 1 then
  1897.             gLine3[gEnemyX4] = 0
  1898.             gLine4[gEnemyX4] = 2
  1899.             gEnemyY4 = gEnemyY4 + 1
  1900.             return 1
  1901.           end if
  1902.         else
  1903.           if gEnemyY4 = 2 then
  1904.             if gLine3[gEnemyX4] <= 1 then
  1905.               gLine2[gEnemyX4] = 0
  1906.               gLine3[gEnemyX4] = 2
  1907.               gEnemyY4 = gEnemyY4 + 1
  1908.               return 1
  1909.             end if
  1910.           else
  1911.             if gEnemyY4 = 1 then
  1912.               if gLine3[gEnemyX4] <= 1 then
  1913.                 gLine1[gEnemyX4] = 0
  1914.                 gLine2[gEnemyX4] = 2
  1915.                 gEnemyY4 = gEnemyY4 + 1
  1916.                 return 1
  1917.               end if
  1918.             end if
  1919.           end if
  1920.         end if
  1921.       end if
  1922.     end if
  1923.   end if
  1924.   return 0
  1925. end
  1926.  
  1927. on MoveEnemy4DownRight
  1928.   if gEnemyY4 = 6 then
  1929.     if gLine7[gEnemyX4 + 1] <= 1 then
  1930.       gLine6[gEnemyX4] = 0
  1931.       gEnemyX4 = gEnemyX4 + 1
  1932.       gLine7[gEnemyX4] = 2
  1933.       gEnemyY4 = gEnemyY4 + 1
  1934.       return 1
  1935.     end if
  1936.   else
  1937.     if gEnemyY4 = 5 then
  1938.       if gLine6[gEnemyX4 + 1] <= 1 then
  1939.         gLine5[gEnemyX4] = 0
  1940.         gEnemyX4 = gEnemyX4 + 1
  1941.         gLine6[gEnemyX4] = 2
  1942.         gEnemyY4 = gEnemyY4 + 1
  1943.         return 1
  1944.       end if
  1945.     else
  1946.       if gEnemyY4 = 4 then
  1947.         if gLine5[gEnemyX4 + 1] <= 1 then
  1948.           gLine4[gEnemyX4] = 0
  1949.           gEnemyX4 = gEnemyX4 + 1
  1950.           gLine5[gEnemyX4] = 2
  1951.           gEnemyY4 = gEnemyY4 + 1
  1952.           return 1
  1953.         end if
  1954.       else
  1955.         if gEnemyY4 = 3 then
  1956.           if gLine4[gEnemyX4 + 1] <= 1 then
  1957.             gLine3[gEnemyX4] = 0
  1958.             gEnemyX4 = gEnemyX4 + 1
  1959.             gLine4[gEnemyX4] = 2
  1960.             gEnemyY4 = gEnemyY4 + 1
  1961.             return 1
  1962.           end if
  1963.         else
  1964.           if gEnemyY4 = 2 then
  1965.             if gLine3[gEnemyX4 + 1] <= 1 then
  1966.               gLine2[gEnemyX4] = 0
  1967.               gEnemyX4 = gEnemyX4 + 1
  1968.               gLine3[gEnemyX4] = 2
  1969.               gEnemyY4 = gEnemyY4 + 1
  1970.               return 1
  1971.             end if
  1972.           else
  1973.             if gEnemyY4 = 1 then
  1974.               if gLine2[gEnemyX4 + 1] <= 1 then
  1975.                 gLine1[gEnemyX4] = 0
  1976.                 gEnemyX4 = gEnemyX4 + 1
  1977.                 gLine2[gEnemyX4] = 2
  1978.                 gEnemyY4 = gEnemyY4 + 1
  1979.                 return 1
  1980.               end if
  1981.             end if
  1982.           end if
  1983.         end if
  1984.       end if
  1985.     end if
  1986.   end if
  1987.   return 0
  1988. end
  1989.